<!--#include file="./top.asp"-->
<%
dim rs_rpt_music, str_rpt_music
set rs_rpt_music = server.CreateObject("Adodb.Recordset")
str_rpt_music = "select * from rpt_music where stu_id = '" & request.QueryString("stu_id") & "'"
rs_rpt_music.open str_rpt_music, conn, 1, 3

if rs_rpt_music.eof then
	rs_rpt_music.addnew
	rs_rpt_music("stu_id") = request.QueryString("stu_id")
	rs_rpt_music.update
	rs_rpt_music.close
rs_rpt_music.open str_rpt_music, conn, 1, 3
end if

for i = 1 to rs_rpt_music.fields.count - 1
	response.Write "rs_rpt_music_" & i & " = " & request.Form("rs_rpt_music_" & i) & "<br />"
	rs_rpt_music.fields(i) = request.Form("rs_rpt_music_" & i)
next
rs_rpt_music.update
%>

</body>
</html>
<%
rs_rpt_music.close
set rs_rpt_music = nothing
call CloseConn()

response.Redirect("./rpt_music.asp?stu_id="& request.QueryString("stu_id"))
%>
